Public Class SystemRoleInfo

#Region " Private Variables "

    Private _roleId As Int16
    Private _roleName As String
    Private _salary As String
    Private _groupId As Int16
    Private _active As Boolean

#End Region

    Public Property RoleId As Int16
        Get
            Return _roleId
        End Get
        Set(value As Int16)
            _roleId = value
        End Set
    End Property

    Public Property RoleName As String
        Get
            Return _roleName
        End Get
        Set(value As String)
            _roleName = value
        End Set
    End Property

    Public Property Salary As String
        Get
            Return _salary
        End Get
        Set(value As String)
            _salary = value
        End Set
    End Property

    Public Property GroupId As Int16
        Get
            Return _groupId
        End Get
        Set(value As Int16)
            _groupId = value
        End Set
    End Property
    Public Property Active As Boolean
        Get
            Return _active
        End Get
        Set(value As Boolean)
            _active = value
        End Set
    End Property
    Public Overrides Function ToString() As String
        Return _roleName
    End Function
End Class